home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / make / icmake-6.000 / icmake-6 / icmake / comp / stackfra.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-02-08  |  444 b   |  29 lines
  1. /*
  2.                             S T A C K F R A . C
  3. */
  4.  
  5. #include "iccomp.h"
  6.  
  7. static ESTRUC_
  8.     frame;
  9.  
  10. ESTRUC_ stackframe(E_TYPE_ type)
  11. {
  12.     frame.type = type;
  13.  
  14.     switch (type)
  15.     {
  16.         case e_int | e_const:
  17.             frame.evalue = atoi(string);
  18.         break;
  19.  
  20.         case e_str | e_const:
  21.             frame.evalue = lookstring(stringbuf);
  22.         break;
  23.  
  24.         default:
  25.             frame.evalue = 0;
  26.     }
  27.  
  28.     return (frame);
  29. }